home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 19 / Amiga Plus Leser CD 19.iso / Tools / Hardware / DCE_PCI_Software / GRexDriver1_0 / CyberGraphX / CGX_Install < prev    next >
Encoding:
Text File  |  2001-03-08  |  27.8 KB  |  561 lines

  1. ;*****************************************************************************
  2. ;    ______        __                  ______                     __  __   __
  3. ;   / __  /       / /                 / __  /  G-REX INSTALL     / /  \ \ / /
  4. ;  / /  -'__  __ / /___ ______ _____ / /_ -'_____ ______ ______ / /__  \ \ /
  5. ; / /     \ \/ // __  // ____// .__// // \ / .__// __  // __  // __  / /  / 
  6. ;/ /___    \  // /_/ // __/_ / /   / /_/ // /   / __  // /_/ // / / / / \ \
  7. ;\____/    / //_____//_____//_/   /_____//_/   /_/ /_// ____//_/ /_/ /_/ \_\
  8. ;         /_/                                        / /
  9. ;                                                   /_/
  10. ; 3dfx         : VooDoo3 2000 and 3000, Voodoo4 4500, Voodoo5 5500
  11. ; S3           : Generic ViRGE 86C325 & ViRGE/DX 86C375 
  12. ; Texas Inst.  : Generic Permedia2 (3DLabs)
  13. ;
  14. ; CyberGraphX  ©1997-2001 Vision Factory Development  http://www.vgr.com
  15. ; G-REX ©2000-2001 by DCE Computer Service GmbH       http://www.dcecom.de/
  16. ; CyberGraphX V3 Update Installer ©1995-2001 by Robert C. Reiswig 
  17. ;
  18. ; $VER: V0.83 (March-08-2001)
  19. ; If you wish to use any part of this installer you must ask. May not be 
  20. ; integrated/placed into any other package! You may NOT change this in an way!
  21. ; You man NOT take or use the ENV definitions and use them without direct
  22. ; permission from me! Changes, suggestions or problems: rob@cgx.vgr.com
  23. ;********************************************************************************
  24.  
  25.  
  26. ;********************************************************************************
  27. ; Cyber Release & Boards
  28. ;********************************************************************************
  29. (set @user-level 2)
  30. (set #cyberver "V4 41.4")
  31. (set NoBoard 0)
  32. (set whereback "SYS:Storage")
  33. (message (cat "CyberGraphX " #cyberver "\n~~~~~~~~~~~~~~~~~~~~~~~~~~\n"
  34.               "ViRGE (86C325) & ViRGE/DX (86C375)\n\nVoodoo4 4500 & Voodoo5 5500\n\nVooDoo3 2000/3000\n\nPremedia2\n\ndrivers for the DCE G-REX"
  35.          )
  36. )
  37.  
  38. (welcome)
  39. ;********************************************************************************
  40. ; Read All System information
  41. ;********************************************************************************
  42. (set cpu (database "cpu")) (if (> (exists ("sys:libs/68060.library")) 0) (set cpu "68060") )
  43. (set vblank (database "vblank")) (set graphmem (database "graphics-mem"))
  44. (set totmem (database "total-mem")) (set osver (/ (getversion "LIBS:version.library") 65536))
  45. (if (= vblank "60") ((set blank "NTSC")) ((set blank "PAL")))
  46. (set fastmem (- totmem graphmem))
  47. ( if (= osver 37) ( (set workbench "2.0")) ( if (= osver 38) ( (set workbench "2.1"))
  48. ( if (= osver 39) ( (set workbench "3.0")) ( if (= osver 40) ( (set workbench "3.1"))
  49. ( if (= osver 41) ( (set workbench "3.2")) )))))
  50. (set pick 0)
  51.  
  52. ;********************************************************************************
  53. ;English Strings
  54. ;********************************************************************************
  55. (set #By (cat "\n\nCyberGraphX\n\nRelease Version " #cyberver "\n\n\n\n"
  56.               "by:\n\nVision Factory Development"
  57.           
  58.          )
  59. )
  60.  
  61. (set #askzorro "\nWhat type of machine is CyberGraphX installed on?\n")
  62. (set #askcpu "\nWhat CPU does the machine have that you are updating CyberGraphX on? The installer has found:\n")
  63. (set #wherelibs "Where do you want the CyberGraphX libraries installed? The default is 'SYS:Libs'")
  64. (set #whatboard (cat "\nPlease Select the Graphics Board(s) you wish to Install CyberGraphX for:\n"))
  65. (set #todo-prompt "\nDo you wish to install:\n")
  66. (set #cgxmode-todo " CGXMode - Create & Change Screen Modes")
  67. (set #wheremode "Where do you wish to copy the CGXMode Program?")
  68. (set #whereshowcgxconfig "Where do you wish to copy the ShowCGXconfig Program?")
  69. (set #showcgxconfig " ShowCGXconfig - CGX Info Program")
  70.  
  71. ;***** New Strings for Aug-11-97
  72. (set #nocvppcboard "\n\n\nCurrently there is no public driver for the CyberVisionPPC graphics card.")
  73. (set #noretinaboard "\n\n\nCurrently there is no public driver for the Retina BLT Z3 graphics card.")
  74. (set #nopicasso4board "\n\n\nCurrently there is no public driver for the Picasso IV graphics card.")
  75. (set #noinfernoboard "\n\n\nCurrently there installer does not fully support the Inferno yet.")
  76.  
  77. (set #ask-MODEFILE1 "Which modefile should be installed for the ") 
  78. (set #ask-MODEFILE2 "? The khz number should not exceed your monitors max khz!")
  79. (set #15KHZ "15khz maximum") (set #31KHZ "31khz maximum")
  80. (set #35KHZ "35khz maximum") (set #38KHZ "38khz maximum")
  81. (set #48KHZ "48khz maximum") (set #57KHZ "57khz maximum")
  82. (set #64KHZ "64khz maximum") (set #80KHZ "80khz maximum")
  83.  
  84. (set #yes "Yes")
  85. (set #no "No")
  86. (set #followingenv "\n\n\n\nThe following section will set the Env Vars for CyberGraphX.")
  87. (set #whatboard-tt "\n\n\n\nThe following ToolTypes will be set for the:\n\n")
  88.  
  89.  
  90. ;*********** NEW English Strings:  Wednesday 03-Sep-97 *************************
  91. (set #nobackup "\n\nThis installer will install CGX for the first time. Before you start you should use the backup program that came with your RTG Graphics system. Then you should use the uninstaller that came with it. If it did not come with these, then you will need to remove it by hand.\n\nYou should do this now if you have not done so.")
  92. (set #whatboot "\nWhat bootlogo would you like to use?\n")
  93. (set #bootdefault "CyberGraphX - Default")
  94. (set #bootppc "Light My Fire - PPC")
  95. (set #bootnone "Don't copy - Already Installed")
  96.  
  97.  
  98. ;*********** NEW English Strings:  Wednesday 22-Oct-97 *************************
  99.  
  100. ;*********** NEW English Strings:  Monday 01-Dec-97 *************************
  101. (set #noaga "\n\n\nCurrently there installer does not fully support the AGA Chipset or the driver is not out. Please see http://www.vgr.com for more info.")
  102. (set #CGXModeNot4AGA " CGXMode - Not for AGA Driver")
  103. (set #noenvaga "\n\nThe following ENV VARs that you will set will be use by the _graphics card(s)_ that you selected. They will NOT be used by the AGA-PPC driver.")
  104.  
  105. ;*********** NEW English Strings:  Wednesday 21-Jan-98 **********************
  106. (set #updatep4flash "\nTo use CyberGraphX with the Picasso IV you should be running version 2.0 or greater of the Picasso IV FlashROM.\n\nThe installer has found a version lower then 2.0.\n\nForm more information and newer FlashROMs you can contact:\nYour Dealer\nVillage Tronic\nVillage Tronic Web site\n")
  107.  
  108. ;*********** NEW English Strings:  Wednesday 11-Mar-98 **********************
  109. (set #noppc1 "\n\nYou selected the PPC option for one of your CPUs. The installer did not find the 'libs:PPC.library'.\n\nCyberGraphX may not work correctly.\n\n Do you wish to reselect the CPU type?")
  110. (set #noppcaga "\nYou selected the 'AGA (PPC Only)' option when picking what graphics card (display device) to use with CyberGraphX. The installer did not find the 'libs:PPC.library'.\n\n The AGACGX driver needs a PPC card installed to work correctly.\n\nDo you wish to Abort the install now?.")
  111. (set #agaquit "\nCyberGraphX install/update exiting.")
  112.  (set #noboard "\nOne of the board(s) or chipset(s) you selected is not currently supported.\n\nPlease look on http://www.vgr.com for an update or wait until the next CyberGraphX archive is released.\n\nThe card with the missing driver was the:\n") 
  113.  
  114.  
  115. ;*********** NEW English Strings: Monday 28-Aug-00 14:57:13 **********************
  116. (set #envtt "\nCurrently CGX is set to the default settings.\n\n\nPlease see the CyberGraphX homepage\n\nhttp://www.vgr.com/cgx\n\nfor a full list of settings and what they do.")
  117. (set #cgxv4 (cat "\nCheck out CyberGraphX V4 at:\nhttp://www.vgr.com/v4\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
  118.                  "\n- Includes -\nCustom drivers for each PCI DCE Card\nHardware blitter support\nCGXVideo support\nCGX Prefs Program\nLatest CGXMode\nCGXMode monitor database\nFully compatible with CGX\n68040 version of the CGX library")
  119. )
  120.  
  121. ;*********** NEW English Strings: Wednesday 06-Dec-00 22:06:32 **********************
  122. (set #novoodoo3 "\n\nNOTE\n\n The current CGX Voodoo3 Driver is not officaly supported and currently development is frozen.")
  123.  
  124.  
  125. ;********************************************************************************
  126. ;German Strings
  127. ;********************************************************************************
  128. (if (= @language "deutsch")
  129. (
  130.  (set #askzorro "\nWelche Erweiterungsslots besitzt der Computer, auf dem Sie CyberGraphX installieren ?\n")
  131.  (set #askcpu "\nWelchen Prozessor besitzt der Computer, auf dem Sie CyberGraphX installieren wollen ? Der installer hat folgendes gefunden:\n")
  132.  (set #wherelibs "Wohin sollen die CyberGraphX Bibliotheken installiert werden? Standard ist 'SYS:Libs'")
  133.  (set #whatboard (cat "\nBitte wählen Sie die Grafikkarte(n), mit denen Sie CyberGraphX benutzen wollen:\n"))
  134.  (set #todo-prompt "\nWelches der folgenden Programme wollen Sie installieren: ?\n")
  135.  (set #cgxmode-todo " CGXMode - Erstellen & Ändern von Bildschirmmodis")
  136.  (set #wheremode "Wohin wollen Sie das CGXMode Programm kopiert haben?")
  137.  (set #whereshowcgxconfig "Wohin wollen Sie das ShowCGXconfig Programm kopiert haben?")
  138.  (set #showcgxconfig " ShowCGXconfig - CyberGraphX Informationsprogramm")
  139.  
  140.  ;***** New Strings for Aug-11-97
  141.  (set #nocvppcboard "\n\n\nMomentan ist kein Treiber für die CyberVisionPPC Grafikkarte frei verfügbar.")
  142.  (set #noretinaboard "\n\n\nMomentan ist kein Treiber für die Retina BLT Z3 Grafikkarte frei verfügbar.")
  143.  (set #nopicasso4board "\n\n\nMomentan ist kein Treiber für die PicassoIV Grafikkarte frei verfügbar.")
  144.  (set #noinfernoboard "\n\n\nMomentan unterstützt dieses Skript die Installation der Inferno Grafikkarte noch nicht.")
  145.  
  146.  (set #ask-MODEFILE1 "Welche Monitorfrequenzdatei wählen Sie für die ") 
  147.  (set #ask-MODEFILE2 "? Die khz Angabe sollte die maximale khz Angabe für ihren Bildschirm nicht überschreiten!")
  148.  (set #15KHZ "15khz maximum") (set #31KHZ "31khz maximum")
  149.  (set #35KHZ "35khz maximum") (set #38KHZ "38khz maximum")
  150.  (set #48KHZ "48khz maximum") (set #57KHZ "57khz maximum")
  151.  (set #64KHZ "64khz maximum") (set #80KHZ "80khz maximum")
  152.  
  153.  (set #yes "Ja")
  154.  (set #no "Nein")
  155.  (set #followingenv "\n\n\n\nDer folgende Abschnitt setzt die Umgebungsvariablen für CyberGraphX.")
  156.  (set #whatboard-tt "\n\n\n\nDie folgenden Piktogrammmerkmale werden gesetzt für die:\n\n")
  157.  
  158.  
  159.  
  160.  ;*********** NEW Strings:  Wednesday 03-Sep-97 *************************
  161.  (set #nobackup "\n\nDieses Installationsskript führt eine Erstinstallation von CyberGraphX durch. Bevor Sie weitermachen, sollten Sie das evtl. vorhandene alte System mit dem entsprechend dafür vorgesehenen Programm sichern. Verwenden Sie dann das Programm zum Entfernen der alten RTG Systemsoftware. Wenn dieses Programm nicht vorhanden ist, so müssen Sie das manuell erledigen.\n\nSie müssen es auf jeden Fall tun, bevor sie mit dieser Installation fortfahren.")
  162.  (set #whatboot "\nWelches StartupLogo wollen Sie installieren ?\n")
  163.  (set #bootdefault "CyberGraphX - Standard")
  164.  (set #bootppc "Light My Fire - PPC")
  165.  (set #bootnone "Nichts kopieren - bereits installiert")
  166.  
  167.  
  168.  ;*********** NEW English Strings:  Wednesday 22-Oct-97 *************************
  169.  
  170.  ;*********** NEW Strings:  Monday 01-Dec-97 *************************
  171.  (set #noaga "\n\n\nEntweder unterstützt das Installationsskript nicht vollständig den AGA Chipsatz oder der Treiber ist nicht verfügbar. Bitte schauen Sie unter http://www.vgr.com für weitere Informationen.")
  172.  (set #CGXModeNot4AGA " CGXMode - Nicht verwendbar für den AGA Treiber!")
  173.  (set #noenvaga "\n\nDie folgenden Variablen, die gesetzt werden, werden nur von _Grafikkarten_ verwendet. Sie werden NICHT vom AGA-PPC Treiber benutzt.")
  174.  (set #multimediamem (cat "MULTIMEDIAMEM\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n"
  175.                           "Wenn MULTIMEDIAMEM=YES, reserviert CGX3 1MB Grafikspeicher der CV64/3D für 3D Texturen & Video Overlays. "
  176.                           "Wenn NO, verhält sich die CV64/3D wie eine andere Karte, die diese Möglichkeiten nicht besitzt, wie z.B. die PicassoII."
  177.                           "Sie erhalten dann volle 4MB Grafikspeicher für Bildschirme mit ZorroIII Geräten (3.5MB bei ZorroII). "
  178.                           "MULTIMEDIAMEM ist standardmäßig auf YES gesetzt (womit 3MB des Grafikspeichers für Bildschirme genutzt werden)."
  179.                      )
  180.  )
  181.  (set #blackborder   (cat "BLACKBORDER\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n"
  182.                           "Das Setzen des Merkmals 'BLACKBORDER=YES' führt dazu, daß der Rahmen um "
  183.                           "den Bildschirm schwarz dargestellt wird. Die RetinaBLT Z3 benutzt sonst immer Farbe 0, "
  184.                           "wogegen andere Karten meist immer schwarz verwenden. Standardeinstellung ist 'BLACKBORDER=NO'."
  185.                      )
  186.  )
  187.  (set #noboard "\nOne of the board(s) or chipset(s) you selected is not currently supported.\n\nPlease look on http://www.vgr.com for an update or wait until the next CyberGraphX archive is released.\n\nThe card with the missing driver was the:\n") 
  188.  
  189.  ;*********** NEW English Strings:  Wednesday 21-Jan-98 **********************
  190.  (set #updatep4flash "\nUm CyberGraphX3 mit der PicassoIV zu benutzen, sollten sie auf jeden Fall die Version 2.0 oder größer des PicassoIV FlashROMs installieren.\n\nDas Installationsskript entdeckte eine ältere Version.\n\nFür weitere Informationen und eine neuere FlashROM Version kontaktieren Sie bitte:\nIhren Händler\nVillageTronic\ndie VillageTronic WWW Seite\n")
  191. )
  192. )
  193.  
  194.  
  195. ;********************************************************************************
  196. ; French Strings by: Gregory Eycken <geycken@geocities.com>
  197. ;********************************************************************************
  198. (if (= @language "français")
  199. (
  200.  (set #askzorro "\nSur quel type d'ordinateur CyberGraphX va-t-il être installé?\n")
  201.  (set #askcpu "\nQuel est le processeur de l'ordinateur sur lequel vous voulez installer CyberGraphX? L'installeur a trouvé :\n")
  202.  (set #wherelibs "Où désirez-vous installer les bibliothèques de CyberGraphX? Par défaut, c'est 'SYS:Libs'.")
  203.  (set #whatboard (cat "\nVeuillez sélectionner la carte graphique dont vous voulez installer le fichier moniteur :\n"))
  204.  (set #todo-prompt "\nDésirez-vous installer :\n")
  205.  (set #cgxmode-todo " CGXMode - Créer et modifier les modes d'écran")
  206.  (set #wheremode "Où désirez-vous installer le programme CGXMode?")
  207.  (set #whereshowcgxconfig "Où désirez-vous installer le programme ShowCGXconfig?")
  208.  (set #showcgxconfig " ShowCGXconfig - Programme d'informations CyberGraphX")
  209.  
  210.  ;***** New Strings for Aug-11-97
  211.  (set #nocvppcboard "\n\n\nIl n'y a actuellement pas de fichier moniteur pour la carte graphique CyberVisionPPC.")
  212.  (set #noretinaboard "\n\n\nIl n'y a actuellement pas de fichier moniteur pour la carte graphique Retina BLT Z3.")
  213.  (set #nopicasso4board "\n\n\nIl n'y a actuellement pas de fichier moniteur pour la carte graphique Picasso IV.")
  214.  (set #noinfernoboard "\n\n\nLe script d'installation n'a pas conçu pour supporter entièrement l'Inferno.") 
  215.  
  216.  (set #ask-MODEFILE1 "Quel fichier de modes désirez-vous installer pour la ") 
  217.  (set #ask-MODEFILE2 "?\nLe nombre de kHz ne devrait pas dépasser la limite maximale de votre moniteur!")
  218.  (set #none "Aucun")
  219.  (set #15KHZ "15kHz maximum") (set #31KHZ "31kHz maximum")
  220.  (set #35KHZ "35kHz maximum") (set #38KHZ "38kHz maximum")
  221.  (set #48KHZ "48kHz maximum") (set #57KHZ "57kHz maximum")
  222.  (set #64KHZ "64kHz maximum") (set #80KHZ "80kHz maximum")
  223.  
  224.  (set #yes "Oui")
  225.  (set #no "Non")
  226.  (set #followingenv "\n\n\n\nLa partie suivante de l'installation va configurer les variables d'environnement pour CyberGraphX.")
  227.  (set #whatboard-tt "\n\n\n\nLa partie suivante de l'installation va configurer les ToolTypes du fichier moniteur de la\n")
  228.  
  229.  
  230.  
  231.  ;*********** New Strings for Wednesday 03-Sep-97 *************************
  232.  (set #nobackup "\n\nCe script d'installation va installer CyberGraphX pour la première fois.\n\nAvant de poursuivre, si vous utilisez un autre système RTG, faites un archivage puis une déinstallation à l'aide des utilitaires fournis avec cet autre système. Si ce système ne contient pas d'utilitaires, enlevez les fichiers manuellement.\n\n")
  233.  (set #whatboot "\nQuel logo désirez-vous afficher durant l'initialisation?\n")
  234.  (set #bootdefault "CyberGraphX - Par défaut")
  235.  (set #bootppc "Light My Fire - Pour les PowerPC")
  236.  (set #bootnone "Ne rien copier - Le logo est déjà installé")
  237.  
  238.  ;*********** New Strings for Wednesday 22-Oct-97 *************************
  239.  
  240. )
  241. )
  242.  
  243. ;********************************************************************************
  244. ; Start Update
  245. ;********************************************************************************
  246. ;(message #by)
  247. (message #nobackup)
  248.  
  249.  
  250. ;*******************************************************************
  251. ;  What board to update
  252. ;*******************************************************************
  253. (set BGuess 0)
  254.  
  255. (if (> (exists ("devs:monitors/ViRGE")) 0) (set BGuess (+ BGuess 1)) )
  256. (if (> (exists ("devs:monitors/Voodoo3")) 0)  (set BGuess (+ BGuess 2)) )
  257. (if (> (exists ("devs:monitors/Voodoo4")) 0)  (set BGuess (+ BGuess 4)) )
  258. (if (> (exists ("devs:monitors/Voodoo5")) 0)  (set BGuess (+ BGuess 8)) )
  259. (if (> (exists ("devs:monitors/Permedia2")) 0)  (set BGuess (+ BGuess 16)) )
  260.  
  261.   (set board (askoptions (choices  " ViRGE & ViRGE/DX" " Voodoo3 2000/3000" " Voodoo4 4500" " Voodoo5 5500" " Permedia2"
  262.                           (prompt #whatboard)
  263.                       (help #whatboard)
  264.                           (default BGuess)
  265.                          )
  266.              )     
  267.   )
  268.  
  269. (if (AND (= (exists (tackon "S3Drivers" "ViRGE")) 0) (IN board 0) ) (abort (cat #noboard "ViRGE")) )
  270. (if (AND (= (exists (tackon "3dfxDrivers" "Voodoo3")) 0) (IN board 1) ) (abort (cat #noboard "Voodoo3")) )
  271. (if (AND (= (exists (tackon "3dfxDrivers" "Voodoo4")) 0) (IN board 2) ) (abort (cat #noboard "Voodoo4")) )
  272. (if (AND (= (exists (tackon "3dfxDrivers" "Voodoo5")) 0) (IN board 3) ) (abort (cat #noboard "Voodoo5")) )
  273. (if (AND (= (exists (tackon "TIDrivers" "Permedia2")) 0) (IN board 4) ) (abort (cat #noboard "Permedia2")) )
  274.  
  275.  
  276. ;********************************************************************
  277. ; Double Check on the CPU
  278. ;********************************************************************
  279. (procedure askaboutcpu
  280.  
  281. (set cpu (database "cpu"))
  282. (if (= cpu 68000) (set #cpu 0)) (if (= cpu 68010) (set #cpu 0))
  283. (if (= cpu 68020) (set #cpu 0)) (if (= cpu 68030) (set #cpu 0))
  284. (if (= cpu 68040) (set #cpu 1)) (if (= cpu 68060) (set #cpu 1)) 
  285. (if (= @installer-version 0)
  286.   (if (> (exists ("sys:libs/68060.library")) 0) (set #cpu 1) )
  287.   (if (= cpu 68060) (set #cpu 1))
  288. )
  289. (if (> (exists ("libs:PPC.library")) 0) (set #cpu 2) )
  290.  
  291. (set cpuPick (askchoice (choices "68020 or 68030" "68040 or 68060")
  292.             (prompt #askcpu)
  293.                     (help   #askcpu)
  294.                   (default #cpu)
  295.       )
  296. )
  297.  
  298. (if (= cpuPick 0) ((set cpuadd ".020") (set cpuadd-1 ".020")) )
  299. (if (= cpuPick 1) ((set cpuadd ".040") (set cpuadd-1 ".040")) )
  300.  
  301. ); END askaboutcpu
  302.  
  303. ;(askaboutcpu)
  304. (set cpuadd ".020") (set cpuadd-1 ".020")
  305.  
  306. ;*******************************************************************
  307. ;  ASK where cybergfx libs are
  308. ;*******************************************************************
  309. (set wherelibs   (askdir (prompt #wherelibs)
  310.              (help   #wherelibs)
  311.                   (default "SYS:Libs")
  312.          )
  313. )
  314.  
  315. ;*******************************************************************
  316. ;  Copy libs if there
  317. ;*******************************************************************
  318. (if (exists (tackon "cgxsystemlib" (cat "cgxsystem.library" cpuadd-1)) )
  319.   (copyfiles (source (tackon "cgxsystemlib" (cat "cgxsystem.library" cpuadd-1))) (dest wherelibs) (newname "cgxsystem.library") (optional "nofail") ) 
  320. )
  321.  
  322.  
  323. ;(if (exists (tackon "cgxbootpiclib" (cat "cgxbootpic.library" cpuadd)) )
  324. ;  (copyfiles (source (tackon "cgxbootpiclib" (cat "cgxbootpic.library" cpuadd))) (dest wherelibs) (newname "cgxbootpic.library") (optional "nofail") ) 
  325. ;)
  326.  
  327. ;*******************************************************************
  328. ;  Ask What bootlogo....
  329. ;*******************************************************************
  330. (if (> (exists ("c:multiview")) 0)  ((set #mpath "c:") (set mfound 1)) )
  331. (if (> (exists ("sys:Utilities/multiview")) 0) ((set #mpath "sys:Utilities") (set mfound 1)) )
  332. (if (= mfound 1) (run (cat "run " (tackon #mpath "multiview ") "cgxbootpiclib/bootlogos.iff")) )
  333.  
  334. (if (exists "libs:cgxbootpic.library") (set whatboot 1))
  335. (set whatboot  (askchoice
  336.                (choices #bootdefault #bootnone)
  337.                (prompt #whatboot)
  338.                (help   #whatboot)
  339.                (default whatboot)
  340.               )
  341. )
  342.  
  343. (if (AND (exists "cgxbootpiclib/cgxbootpic.library") (= whatboot 0))
  344.   (copyfiles (source "cgxbootpiclib/cgxbootpic.library") (dest wherelibs) (optional "nofail") ) 
  345. )
  346.  
  347.  
  348. ;*******************************************************************
  349. ;  Install monitor file and handle extra libs 
  350. ;*******************************************************************
  351.   (if (IN board 0)
  352.    (
  353.      (set zadd "")
  354.  
  355.      (if (exists (tackon "S3Drivers" (cat "ViRGE" zadd)))
  356.       (if (= (exists (tackon "devs:monitors" "ViRGE.info")) 0)      
  357.        (copyfiles (source (tackon "S3Drivers" (cat "ViRGE" zadd))) (dest "devs:monitors") (infos) (optional "nofail") ) 
  358.        (copyfiles (source (tackon "S3Drivers" (cat "ViRGE" zadd))) (dest "devs:monitors") (optional "nofail") ) 
  359.       )      
  360.      )
  361.  
  362.      (if (exists (tackon "cgxvideolib" (cat "cgxvideo.library" cpuadd)) )
  363.        (copyfiles (source (tackon "cgxvideolib" (cat "cgxvideo.library" cpuadd))) (dest wherelibs) (newname "cgxvideo.library") (optional "nofail") ) 
  364.      )
  365.  
  366.      (if (exists (tackon "cgx3dvirgelib" (cat "cgx3dvirgin.library" "")) )
  367.        (copyfiles (source (tackon "cgx3dvirgelib" (cat "cgx3dvirgin.library" ""))) (dest wherelibs) (newname "cgx3dvirgin.library") (optional "nofail") ) 
  368.      )
  369.  
  370.    )
  371.   )
  372.  
  373.   (if (IN board 1)
  374.    (
  375.      (set zadd "")  
  376.  
  377.      (if (exists (tackon "3dfxDrivers" (cat "Voodoo3" zadd)))
  378.       (if (= (exists (tackon "devs:monitors" "Voodoo3.info")) 0)      
  379.        (copyfiles (source (tackon "3dfxDrivers" (cat "Voodoo3" zadd))) (dest "devs:monitors") (infos) (optional "nofail") ) 
  380.        (copyfiles (source (tackon "3dfxDrivers" (cat "Voodoo3" zadd))) (dest "devs:monitors") (optional "nofail") ) 
  381.       )      
  382.      )
  383.    )
  384.   )
  385.  
  386.  
  387.   (if (IN board 2)
  388.    (
  389.      (set zadd "")  
  390.  
  391.      (if (exists (tackon "3dfxDrivers" (cat "Voodoo4" zadd)))
  392.       (if (= (exists (tackon "devs:monitors" "Voodoo4.info")) 0)      
  393.        (copyfiles (source (tackon "3dfxDrivers" (cat "Voodoo4" zadd))) (dest "devs:monitors") (infos) (optional "nofail") ) 
  394.        (copyfiles (source (tackon "3dfxDrivers" (cat "Voodoo4" zadd))) (dest "devs:monitors") (optional "nofail") ) 
  395.       )      
  396.      )
  397.    )
  398.   )
  399.  
  400.  
  401.   (if (IN board 3)
  402.    (
  403.      (set zadd "")  
  404.  
  405.      (if (exists (tackon "3dfxDrivers" (cat "Voodoo5" zadd)))
  406.       (if (= (exists (tackon "devs:monitors" "Voodoo5.info")) 0)      
  407.        (copyfiles (source (tackon "3dfxDrivers" (cat "Voodoo5" zadd))) (dest "devs:monitors") (infos) (optional "nofail") ) 
  408.        (copyfiles (source (tackon "3dfxDrivers" (cat "Voodoo5" zadd))) (dest "devs:monitors") (optional "nofail") ) 
  409.       )      
  410.      )
  411.    )
  412.   )
  413.  
  414.  
  415.   (if (IN board 4)
  416.    (
  417.      (set zadd "")  
  418.  
  419.      (if (exists (tackon "TIDrivers" (cat "Permedia2" zadd)))
  420.       (if (= (exists (tackon "devs:monitors" "Permedia2.info")) 0)      
  421.        (copyfiles (source (tackon "TIDrivers" (cat "Permedia2" zadd))) (dest "devs:monitors") (infos) (optional "nofail") ) 
  422.        (copyfiles (source (tackon "TIDrivers" (cat "Permedia2" zadd))) (dest "devs:monitors") (optional "nofail") ) 
  423.       )      
  424.      )
  425.    )
  426.   )
  427.  
  428. ;*********************************************************************************
  429. ; Setup Monitor Config File Setup
  430. ;*********************************************************************************
  431. (set modefile 0)
  432. (procedure askconfigfile
  433.   (set modefile (askchoice
  434.                  (choices "None/Skip" #31KHZ #35KHZ #38KHZ #48KHZ #57KHZ #64KHZ #80KHZ)
  435.                  (prompt (cat #ask-MODEFILE1 boardname #ask-MODEFILE2))
  436.                  (help   (cat #ask-MODEFILE1 boardname #ask-MODEFILE2))
  437.                  (default modefile)
  438.                 )
  439.   )
  440.  
  441.   (if (> modefile 0)
  442.    (
  443.     (if (< (exists "env:CyberGraphX") 2) (makedir "env:CyberGraphX") )    
  444.     (if (< (exists "envarc:CyberGraphX") 2) (makedir "envarc:CyberGraphX") )    
  445.  
  446.     (if (= modefile 1) (set mode "Monitor-31khz")) (if (= modefile 2) (set mode "Monitor-35khz")) 
  447.     (if (= modefile 3) (set mode "Monitor-38khz")) (if (= modefile 4) (set mode "Monitor-48khz")) 
  448.     (if (= modefile 5) (set mode "Monitor-57khz")) (if (= modefile 6) (set mode "Monitor-64khz")) 
  449.     (if (= modefile 7) (set mode "Monitor-80khz")) 
  450.  
  451.     (if (< (exists "sys:prefs") 2) (makedir "sys:prefs") )  
  452.     (if (< (exists "sys:prefs/presets") 2) (makedir "sys:prefs/presets") )  
  453.     (if (< (exists "sys:prefs/presets/monitors") 2) (makedir "sys:prefs/presets/monitors") )    
  454.     (copyfiles (source (cat "prefs/presets/monitors/" mode))  (dest "sys:prefs/presets/monitors")) 
  455.  
  456.     ;(message (cat "setenv CyberGraphX/" boardname "Monitor " mode))
  457.     ;(run (cat "setenv CyberGraphX/" boardname "Monitor " mode))
  458.  
  459.     (delete (cat "env:CyberGraphX/" boardname "Monitor"))
  460.     (textfile (dest (cat "env:CyberGraphX/" boardname "Monitor")) (append mode))
  461.     (copyfiles (source (cat "env:CyberGraphX/" boardname "Monitor"))  (dest "envarc:CyberGraphX") )
  462.    )
  463.   )
  464. )
  465.  
  466. (if (IN board 0) ( (set boardname "ViRGE")     (askconfigfile))) 
  467. (if (IN board 1) ( (set boardname "Voodoo3")   (askconfigfile))) 
  468. (if (IN board 2) ( (set boardname "Voodoo4")   (askconfigfile)))
  469. (if (IN board 3) ( (set boardname "Voodoo5")   (askconfigfile)))
  470. (if (IN board 4) ( (set boardname "Permedia2") (askconfigfile)))
  471.  
  472. ;*********************************************************************************
  473. ;* TTs & ENVs 
  474. ;*********************************************************************************
  475. (message #envtt)
  476.  
  477. ;*********************************************************************************
  478. ;* Ask user to install CGXMode 
  479. ;*********************************************************************************
  480. (set toolpick 3)
  481.  
  482.   (set ToDo (askoptions (choices #cgxmode-todo #showcgxconfig)
  483.                         (prompt #todo-prompt)
  484.                         (help #todo-prompt)
  485.                         (default toolpick)
  486.             )
  487.   ) 
  488.  
  489.   (if (IN ToDo 0) 
  490.     ( 
  491.       (set wheremode   (askdir (prompt #wheremode)
  492.                                (help   #wheremode)
  493.                            (default "SYS:Prefs")
  494.                )
  495.       )
  496.  
  497.       (if (exists "CGXMode/CGXMode")
  498.        (if (= (exists (tackon wheremode "CGXMode.info")) 0)
  499.         (copyfiles (source "CGXMode/CGXMode")  (dest wheremode) (infos) (optional "nofail")) 
  500.         (copyfiles (source "CGXMode/CGXMode")  (dest wheremode) (optional "nofail"))          
  501.        )
  502.       )
  503.  
  504.       ;(if (IN board 0) (set TTBOARD "ViRGE") ) 
  505.  
  506.       ;(if (> board 0)
  507.       ;  (tooltype (dest (tackon wheremode "CGXMode")) (settooltype "BOARD" TTBOARD) ) 
  508.       ;)
  509.  
  510.       (if (= @language "deutsch")
  511.        (
  512.          (if (= (exists "Locale:Catalogs") 0) (makedir "sys:Locale/Catalogs") )
  513.          (if (= (exists (tackon "Locale:Catalogs" "deutsch")) 0) (makedir (tackon "sys:Locale/Catalogs" "deutsch")) )
  514.          (if (exists "CGXMode/catalogs/deutsch/cgxmode.catalog")
  515.            (copyfiles (source "CGXMode/catalogs/deutsch/cgxmode.catalog") (dest "sys:Locale/Catalogs/deutsch") )
  516.          )
  517.        )
  518.       )
  519.  
  520.     )
  521.   )
  522.  
  523.  
  524. (if (IN ToDo 1) 
  525.   ( 
  526.     (set whereshowcgxconfig   (askdir (prompt #whereshowcgxconfig)
  527.                              (help   #whereshowcgxconfig)
  528.                          (default "SYS:Tools")
  529.              )
  530.     )
  531.  
  532.     (if (exists "tools/showcgxconfig")
  533.      (if (= (exists (tackon whereshowcgxconfig "CGXMode.info")) 0)
  534.       (copyfiles (source "tools/showcgxconfig")  (dest whereshowcgxconfig) (infos) (optional "nofail")) 
  535.       (copyfiles (source "tools/showcgxconfig")  (dest whereshowcgxconfig) (optional "nofail"))          
  536.      )
  537.     )
  538.  
  539.   )
  540. )
  541.  
  542.  
  543.  
  544.  
  545.  
  546. ;*******************************************************************
  547. ;  END
  548. ;*******************************************************************
  549. (message #cgxv4)
  550.  
  551.  
  552. (if (> (exists ("c:multiview")) 0) (set #mpath "c:") )
  553. (if (> (exists ("sys:Utilities/multiview")) 0) (set #mpath "sys:Utilities") )
  554.  
  555. (run (cat "run " #mpath "/multiview ReadMe.txt") )
  556.  
  557. (set @default-dest "ram:")
  558.  
  559. (exit)
  560.